home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / bits_dll / dlltest.bas < prev    next >
BASIC Source File  |  1995-09-06  |  977b  |  13 lines
  1. Declare Function GetProfileString Lib "Kernel" (ByVal Sname$, ByVal Kname$, ByVal Def$, ByVal Ret$, ByVal Size%) As Integer
  2.  
  3. Declare Function bitAnd Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  4. Declare Function bitOr Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  5. Declare Function bitXOr Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  6. Declare Function bitShiftLeft Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  7. Declare Function bitShiftRight Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  8.  
  9. Declare Function byteHigh Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer) As Integer
  10. Declare Function byteLow Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer) As Integer
  11. Declare Function bitPack Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  12.  
  13.